home *** CD-ROM | disk | FTP | other *** search
/ FM Towns: Free Software Collection 10 / FM Towns Free Software Collection 10.iso / tos_updt / fmcity / palcom / esc / escfmr.def < prev   
Text File  |  1995-04-04  |  4KB  |  118 lines
  1. ESCDEF    FMR/TOWNSシリーズ
  2. ;----------------------------------------------------------------------
  3. ;
  4. ;    ＥＳＣファンクション定義(ＦＭＲシリーズ用)
  5. ;    COPYRIGHT (C) 1993 FUJITSU/HORIANT
  6. ;
  7. ;----------------------------------------------------------------------
  8. ;
  9. ;　１つの定義は、１行からなるシーケンス定義とファンクション定義の２つで
  10. ;構成される。
  11. ;
  12. ;　シーケンス定義 ファンクション定義 [ : ファンクション定義 [ ･･･ ]]
  13. ;
  14. ;　シーケンス定義は、一致する文字そのもの、または特殊文字で構成される。
  15. ;
  16. ;    特殊文字    意味
  17. ;    －－－－－－－－－－－－－－－－－－－－－－－－－－－－－－
  18. ;    \\        '\'記号
  19. ;    ;        以降をコメントとして扱う
  20. ;    \;        ';'記号
  21. ;    \- \/        区切り文字、意味を持ちません。
  22. ;    \_        空白
  23. ;    \t        タブ
  24. ;    \{ ... \}    \{ ... \} で囲まれた部分について、どれか一つが一致
  25. ;    \[ ... \]    \[ ... \] で囲まれた部分について、どれか複数が一致
  26. ;    \x??        ??は16進数の文字コード
  27. ;    \i        初期化指定。ＥＳＣオン時に自動的にこのシーケンスが
  28. ;            出力される。
  29. ;    \e        ＥＳＣ文字(0x1B)
  30. ;    \D        １文字の10進数に一致する
  31. ;    \?        任意の１文字に一致する
  32. ;    
  33. ;    \d        ('0'～'9')10進数のパラメタ
  34. ;    \c        任意の１文字をパラメタにする(任意)
  35. ;    \b        文字コードをパラメタとする(' '～'~')
  36. ;    \a        文字コード－１ＦＨをパラメタとする(' '～'~')
  37. ;    \s        文字列をパラメタとする(任意)
  38. ;    
  39. ;　ファンクション定義は、機能名とパラメタで構成される。
  40. ;
  41. ;　機能名 [パラメタ[,パラメタ[･･･]]]
  42. ;
  43. ;  機能名は、大文字と小文字の区別はありません。パラメタにはあります。
  44. ;  機能について複数のパラメタを書くことができます。そのときは','で区切り
  45. ;ます。
  46. ;
  47. ;　パラメタには以下の特殊パラメタを使用することができます。
  48. ;
  49. ;    特殊パラメタ    意味
  50. ;    －－－－－－－－－－－－－－－－－－－－－－－－－－－－
  51. ;    数値        0～32767までの数値
  52. ;    四則演算(+-/*)    演算。ただし、演算の順序は表記された順（
  53. ;            左から右）に行われます。
  54. ;    論理演算(&|^)    論理演算。
  55. ;    ビット演算(<>)    シフト演算。
  56. ;    %1～%9,%A～%Z    シーケンスで表記したパラメタ。表記順に%1
  57. ;            ～%9,%A～%Zとなります。
  58. ;    $1～$9,$A～$Z    上記パラメタへのポインタ。
  59. ;
  60. ;　その他
  61. ;
  62. ;　行頭に';'を書けばその行はコメントになる。
  63. ;　
  64. ;    ESCシーケンス定義
  65. ;
  66. ;----------------------------------------------------------------------
  67. \e[\d\;\d\{Hf\}    LOCATE %2,%1
  68. \e[A    QLOCATE $X,$Y : LOCATE %X,%Y-1
  69. \e[B    QLOCATE $X,$Y : LOCATE %X,%Y+1
  70. \e[C    QLOCATE $X,$Y : LOCATE %X+1,%Y
  71. \e[D    QLOCATE $X,$Y : LOCATE %X-1,%Y
  72. \e[0A    QLOCATE $X,$Y : LOCATE %X,%Y-1
  73. \e[0B    QLOCATE $X,$Y : LOCATE %X,%Y+1
  74. \e[0C    QLOCATE $X,$Y : LOCATE %X+1,%Y
  75. \e[0D    QLOCATE $X,$Y : LOCATE %X-1,%Y
  76. \e[\dA    QLOCATE $X,$Y : LOCATE %X,%Y-%1
  77. \e[\dB    QLOCATE $X,$Y : LOCATE %X,%Y+%1
  78. \e[\dC    QLOCATE $X,$Y : LOCATE %X+%1,%Y
  79. \e[\dD    QLOCATE $X,$Y : LOCATE %X-%1,%Y
  80. \e[6n    NOP
  81. \e[s    QLOCATE $H,$V
  82. \e[u    LOCATE  %H,%V
  83. \e[J    QLOCATE $A,$B : QWIDTH $C,$D : CLSBOX 1,%B+1,%C,%D : CLSBOX %A,%B,%C,%B
  84. \e[0J    QLOCATE $A,$B : QWIDTH $C,$D : CLSBOX 1,%B+1,%C,%D : CLSBOX %A,%B,%C,%B
  85. \e[1J    QLOCATE $A,$B : QWIDTH $C,$D : CLSBOX 1,1,%C,%B-1 : CLSBOX  1,%B,%A,%B
  86. \e[2J    CLS
  87. \e[K    QLOCATE $A,$B : QWIDTH $C,$D : CLSBOX %A,%B,%C,%B
  88. \e[0K    QLOCATE $A,$B : QWIDTH $C,$D : CLSBOX %A,%B,%C,%B
  89. \e[1K    QLOCATE $A,$B : CLSBOX  1,%B,%A,%B
  90. \e[2K    QLOCATE $A,$B : QWIDTH $C,$D : CLSBOX  1,%B,%C,%B
  91. \e[=\{0123\}h    CLS
  92. \e[=\{0123\}l    CLS
  93. \e[\s\[\D\;\]m    ANSICOLOR %1
  94. \e=\a\a        LOCATE %2,%1
  95. \e[\c\{01\}v    CSRTYPE %1-0x30
  96. \e*        CLS
  97. \eY    QLOCATE $A,$B : QWIDTH $C,$D : CLSBOX %A,%B,%C,%B : CLSBOX 1,%B+1,%C,%D
  98. \eT    QLOCATE $A,$B : QWIDTH $C,$D : CLSBOX %A,%B,%C,%B
  99. \eE    QLOCATE $A,$B : QWIDTH $C,$D : SCROLL 1,%B,%C,%D,0,0-1
  100. \eR    QLOCATE $A,$B : QWIDTH $C,$D : SCROLL 1,%B,%C,%D,0,1
  101. \eG\b    LET $A,%1&0x20>2 : LET $A,%1&0x07|%A : LET $A,%1&0x08<1|%A : QCOLOR $B : COLOR %B&0xFF00|%A
  102. \e1        TABSET
  103. \e2        TABCLR
  104. \e3        TABCLRALL
  105. \eX\D        NOP
  106. \e.\b\b        CSRTYPE %1&0x1F,%2&0x1F
  107. \e\c\G        PUTC %1|0x100
  108. ;----------------------------------------------------------------------
  109. ;
  110. ;    １バイトコード定義(優先度を下げないと一致する可能性大)
  111. ;
  112. ;----------------------------------------------------------------------
  113. \x07        BEEP
  114. \x15        WAIT 1
  115. \x16        CLS : WAIT 1
  116. \i\eINIT_FMR1    ANSIBACKCHAR 1
  117. \i\eINIT_FMR2    QLOCATE $A,$B : QWIDTH $C,$D : CLSBOX 1,%B+1,%C,%D : CLSBOX %A,%B,%C,%B
  118.